object frm_MLADatabase: Tfrm_MLADatabase Left = 307 Top = 377 BorderStyle = bsToolWindow Caption = 'Database' ClientHeight = 231 ClientWidth = 530 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object pnlBottom: TTntPanel Left = 0 Top = 194 Width = 530 Height = 37 Align = alBottom BevelOuter = bvNone TabOrder = 2 object btCancel: TTntButton Left = 427 Top = 8 Width = 75 Height = 23 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 0 end object btOK: TTntButton Left = 347 Top = 8 Width = 75 Height = 23 Caption = 'OK' Default = True TabOrder = 1 OnClick = btOKClick end end object grpConnection: TTntGroupBox Left = 0 Top = 0 Width = 530 Height = 99 Align = alTop Caption = 'Connection' TabOrder = 0 object Label1: TTntLabel Left = 10 Top = 27 Width = 49 Height = 13 Caption = 'Database:' end object lbUserName: TTntLabel Left = 10 Top = 67 Width = 87 Height = 13 Caption = 'Username:' end object Label2: TTntLabel Left = 293 Top = 27 Width = 63 Height = 13 Caption = 'Server:' end object Label3: TTntLabel Left = 293 Top = 67 Width = 63 Height = 13 Caption = 'Password:' end object btDatabase: TTntButton Left = 254 Top = 24 Width = 22 Height = 20 Caption = '...' TabOrder = 1 OnClick = btDatabaseClick end object txtUsername: TTntEdit Left = 102 Top = 64 Width = 175 Height = 21 TabOrder = 3 end object txtPassword: TTntEdit Left = 355 Top = 64 Width = 153 Height = 21 PasswordChar = '*' TabOrder = 4 end object txtServer: TTntEdit Left = 355 Top = 24 Width = 153 Height = 21 TabOrder = 2 end object txtDatabase: TTntEdit Left = 102 Top = 24 Width = 151 Height = 21 TabOrder = 0 end end object grpDatabase: TTntGroupBox Left = 0 Top = 99 Width = 530 Height = 95 Align = alClient Caption = 'Database' TabOrder = 1 object lbSyntax: TTntLabel Left = 16 Top = 28 Width = 73 Height = 13 Caption = 'Syntax' end object lbDriver: TTntLabel Left = 16 Top = 68 Width = 65 Height = 13 Caption = 'Driver' end object cmbSyntax: TTntComboBox Left = 102 Top = 24 Width = 407 Height = 21 Style = csDropDownList ItemHeight = 13 ItemIndex = 0 TabOrder = 0 Text = 'MySQL' OnChange = cmbSyntaxChange Items.Strings = ( 'MySQL' 'MS Access' 'MS SQL Server') end object cmbDriver: TTntComboBox Left = 102 Top = 64 Width = 407 Height = 21 Style = csDropDownList Enabled = False ItemHeight = 13 TabOrder = 1 Items.Strings = ( 'OLE DB') end end end